unit Logo;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls;

type
  TLogoForm = class(TForm)
    Timer: TTimer;
    Image: TImage;
    procedure TimerTimer(Sender: TObject);
  end;

var
  LogoForm: TLogoForm;

implementation

{$R *.dfm}

procedure TLogoForm.TimerTimer(Sender: TObject);
begin
    Free;
end;

end.
